
R3F_FNCT_PosteArty = {
	private ["_item","_pos","_dir","_post"];
	_item = _this select 0;
	if (isNil "_item") exitWith {};
	_pos = [_item] call R3F_FNCT_GetPos;
	if (count _pos == 0) exitWith {};
	_dir = _this select 1;
	if (typeName _dir != "SCALAR") exitWith {};
	_post = createVehicle ["SatPhone",_pos,[],0,"NONE"];
	_post setDir _dir;
	_post setPos _pos;
	[_post] execVM "R3F\R3F_ARTY_AND_LOG\R3F_ARTY\poste_commandement\creer_poste_commandement.sqf";
};
